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Subject: Diagnostic Program DUOIA 
Sequence #390 
Replaces N/A 



I. This is a new file program for use on either 
a 1301 or 1302. 

II. This program is compatible with TC50. 

HI. This program requires system and channel 
control cards. 



Enclosures: oy# P ages 

Card Deck for Card only Systems 

8 C ards - Card Loaded and Core Clear 
178 C ards No. 001-178 Data Cards 
1 Card - Execute 



Distribution: 1410 
7010 
Other 



1410 or 7010 with 1301 or 1302 
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6. 50. 00. 0 1302/1301 Surface Re-Initialize and Flag Log Utility Program 
00. 1 Description 

This program performs two utility functions on the 1302 or 
1301 attached to a 1410/7010. 

A. Restores all HA1 and flag addresses on any two 
surfaces effected by a drawer replacement. 

B. Produces a log of all flagged tracks in the selected 
module. 

The program will be operating in the area of the file that contains 
customer data and it takes the following steps to protect that data. 

A. No format tracks are altered. 

B. Selection of the module, access, and surfaces to 
be written must be manually verified. 

C. Write operations are used only on the selected 
surfaces. 

D. Error conditions in the file or 7631 will cause the 
program to terminate its operation. 

All data that may have been on the selected surfaces will be des- 
troyed. The HAl's are re- written on the surfaces and any tracks 
that were flagged will have the flags restored automatically. (In 
the case of surface 0, the CE must enter all flags to be restored. ) 

01. 0 Operating Procedures 

01.1 Loading Procedure 

Use standard 1410/7010 Diagnostic Loading Procedures 

01. 2 Switch Settings Previous to Running Program 

A. All Format Switches OFF. 

B. All 7631 CE Switches OFF. 

C. HAO Switch OFF. 

D. All 1302/1301 files not to be tested should be set 
Inoperative. 
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6. 50. 01. 3 Program Messages and Requests in their Order of Occurrence 

A. "Enter 1 for 1301, 2 for 1302" 

CE enters a 1 if the file is a 1301; he enters a 2 for a 1302. 

B. "Enter 1 for Flag Log Only, 2 for Restore ADDR" 

CE enters a 1 if no surfaces are to be restored only 
it the flag log is desired; he enters a 2 if surfaces are 
to be restored-the flag log will also be generated. 

C. "Enter CHL, MOD, and ACC in that order" 

CE enters channel number, module number, and access 
number that will be used. 

D. "Enter 2 Digit Lower Head Number" 

See chart on page 9 for number to be entered. 

E. V Enter Number of Alter Heads Avail ' 

CE enters the number of available alternate heads on 
the selected access (2, 4, or 6). 

F. "Selected access and Module are not Ready, Press 
Start" and Program will be Restarted ' 

If access and module that the CE selected are not ready, 
the program stops and may be restarted by pressing start. 

G. "ACC X, MOD X, HEADS XX & XX, ON CHL X, where 
SLTD, enter 1 if this is correct, 2 if it is not 1 

The CE verifies that the correct life address has been 
entered and excepted by the program. If 2 is entered, 
the program restarts. 



duoi 

"Visually ChecK That the ACC, MOD, and Lower 
Head are SLTD and that all other ACC are INOP. 
If so, enter 1, if not enter 2" 

The CE visually checks the 7631 and the file to 
insure tne proper module, access, and head have been 
selected. He then enters 1 if the selection is verified, 
2 if not. The program restarts it 2 is entered. 

"Turn on the HAO, CE-HAO Switches, Press Start! 

CE turns on switches. 

"Turn on CE-WRT SW" 

CE turns on the 7631 CE-WRT Switch and presses 
Start to continue. Issued only for 1302, 

"Turn Off CE-WRT SW" 

CE turns off the 7631 CE-WRT switch and presses 
Start to continue. Issued only for 1302. 

"Enter HA 1 & Flag for first track on Surface 0 to be 
Flagged" 

If surface 0 is being restored, the CE must enter the 
track address to be flagged and the flag character to 
be used. Enter bbbbb if no tracks to flag. 

"Enter HA 1 & Flag Char for next TRK on Surf 0 to 
be Flagged" 

CE enters the next sequential track address to flagged 
on surface 0 and the flag character to be used. Enter 
bbbbb it no more tracks to be flag. 
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6. 50. 02. 0 Error Procedures and Messages 

The program constantly monitors the status of the 7631/1X2 
for error conditions which may endanger the customer data on 
the file if the program continues* When an error is encountered 
the file operation is re-tried 10 times; if the error is still en- 
countered, the program operation is terminated by the abort 
routine. 

Before beginning the normal operation, the program performs 
a quick test at the CE-cyl to insure that the required file ops. are 
functioning. Failure during this routine also results in the 
termination of the program run. 

Once the program has been terminated, it cannot be restarted 
until it has. been reloaded,, This is done to impress the CE with 
the need to use the standard diagnostics to restore the 7631/1302 
to an operational status, and to insure that the customer's data 

is protected* 

02. 1 Error Message Format 

"ROUTINE NOO" Ident of routine in which error occurred 
"♦ERROR : ' M%FS"10000W 1248AB" 

12 3 

1. Starting address of failing routine. 

2. Failing file instruction. 

3. Status condition that was encountered. 

02. 2 ABORT Message 

" The error indicated occurred 10 times consecutively and 
the pro-gram run is being terminated,, Press start to call 
next diag 8 Si 

(a- 5"®. 0% . o Program Generated Logs . &. Tables. 

The program generates 2 logs, first is a log of all flagging 
errors that exist on the file; second is a log of all properly 
flagged tracks. The next two pages show examples of both, 
types of logs. 
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FLAGGING ERROR LOG EXAMPLE 



FLAGGING ERROR LOG 

ALTER TRK HA1 DATA TRK HA1 



2 
3 
4 



0001 
0002 
0005 



0001 
0003 
0005 
0006 



FLG 

1 
3 
8 



ERR TYPE 

■'•1 ' '. 
2 
3 
4 



Multiple Alternates with = HAl's 



Multiple Data Surfaces with = Flags/or Data Surface Flagged 
to Alternate that has no HA1 

3 Alternate with HA1 = to a Data Surface which is not Flagged 

4 Data Surface with an Illegal Flag 
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FLAG LOG EXAMPLE 



FLAG LOG 

•TRACK ADDR (HAL) 

CylOOO 
0001 
0004. 
Cyl 010 
0426 
0428 
Cyl 101 
4087 



FLAG CHAR. 



2 

•4. 

1 
2 



** 



8632 
Cyl 249 
9971 
9985 



5 
6 



* Flags Restored On Affected Data Surfaces 

** Addresses Restored On Affected Alternate Surfaces 




All HAl's and flags are those read from data surfaces and checked 

against the addresses on the alternate surfaces. 



Selecting Lower Surface Number; Use this chart to determine number 
Drawer Enter 2 Digit Number For 



Replaced 1301-AC3O 1302-ACCO 1302-ACC1 
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